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May 6, 1970 


Mr. T. Nelson 
Systems Consultant 
Box 3 

Schooleys Mountain, 
New Jersey 07870 

Dear Mr. Nelson: 


Thank you for your interest in COMPAK/360. An On-Line 
Communication Control System, COMPAK/360 is designed 
specifically for OS installations. It resides in 25K 
of core and is application independent. 

A review of the enclosed material will point up the many 
benefits and features of COMPAK/360. 

I am also including information about our EASYTAX/360, 
EASYTRIEVE/300, and JCL/360 packages that may be of 
interest to you. 

If I can supply you with additional information or answer 
any questions please contact me at your convenience. 


Sincerely, 



Director of Marketing 


PJC/jam 

Enclosures 
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EASYTAX/360 • EASYTAX/360 • EASYTAX 
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• Comprehensive Program Package 

• Calculates Withholding tax 


Applies in both U.S. and 
Canada for all tax jurisdictions 


• Operates on IBM 360 



Is a self-contained program 



HOW DOES EASYTAX/360 


• Executes 

• • By call from another program 

• • Directly 


Runs with DOS or OS in IBM/360 
COBOL 
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INPUTS 



MASTER EMPLOYEE RECORD 




Salary 

Resident tax jurisdiction 
Working (office) tax jurisdiction 
Marital status 
Number of exemptions 
Space to place calculated tax 
withholdings 










TAX JURISDICTION MASTER FILE 

• Index sequential file 

• Contains tax withholding data for 
each unique tax jurisdiction in U. S. 
or Canada 

• Available with Easytax/360 program 

• Updated and maintained by 
Computer Audit 




CALCULATES THE FOLLOWING 
PAYROLL DEDUCTIONS 

• Federal income tax 

• FICA 

• State income tax 

• State disability 

• State unemployment 

• County withholding 

• City withholding 

• Water District withholding 

• School District withholding 
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CONTRACTUAL 

ARRANGEMENT: 

Purchase Plan 

INSTALLATION 

INCLUDES: 

Object program 
Program documentation 
T raining 
Updates 
Maintenance 

FOR MORE 

INFORMATION: 

Contact a Computer Audit 
representative and arrange 
for a demonstration at 
your convenience. 


Offers choice between buying or building software that: 

• Satisfies a well defined, typical processing need 

• Offers a new, unique technological approach to solving 
a particular problem or class of problems 


• Offers an improvement on existing applications of 
systems programs. 

Additional . . . product software . . . available 
Compak/360 

jc l/36C) V 6/300 COMPUTER 
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COMPAK 360 






ON-LINE 


COMMUNICATION 

CONTROL 
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COMPAK/360 • COMPAK/360 • COMPAK/360 • COMPAK/360 
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• Provides a medium to large computer 
installation with the capability of 
operating in an on-line, time sharing mode 



• Provides an interface between a terminal 
user and a data base in an on-line 
environment 


• Application independent 


Minimum core requirements allows 
concurrent batch processing 


• Savings of hundreds of thousands of 
dollars in development time, computer 


costs, man-hours and programmer time 


• COMPAK/360 • COMPAK/360 
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CO 


Provides software interface that links th 
application, the data base, the computer 
the Operating System and the 
Communications Network 


• Provides interface for application 
programs written with COBOL, PL/1, 
FORTRAN, ALP, or RPG 


• Permits the user the means by which 
to make orderly transition from batch 
processing to an on-line environment 


• Allows user to concentrate efforts on 
applications 


• COMPAK/360 • COMPAK/360 • COMPAK/360 • COMPAK/360 • COMPAK/360 • 
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SYSTEM COMPONENTS 

•m Resource Scheduling 
User/System Interface 
Terminal Communications 
System File Management 
Application Program Services 
Operator/System Interface 
Transaction History 
Update Processing 
Conversational Processing 
System Startup and Shutdown 
Fallback and Recovery 

PAK/360 * COMPAK/360 * COMPAK/360 • 


TYPICAL 

APPLICATIONS 

• Order entry 

• Credit authorization 

• Inventory control 

• Brokerage back office 

• Information retrieval 

• Data entry 


SYSTEM REQUIREMENTS 

• Core Storage 

32K(Compak/360) 

40K (Application programs) 

• Operating System 

MFT II 
MVT 
HASP 
ASP 

• Peripheral Devices - one 2311 
or 2314 for control program 
data sets 


SYSTEMS FILE 
SUPPORT 


Sequential 
Indexed Sequential 
Random 


COMPAK/360 • COMPAK/360 


COMMUNICATIONS 

SUPPORT 

Graphic Displays (2260, etc.) 
Hard copy terminals 
(2741, teletype, etc.) 

* 3OMRAK/360 - CC ' 















CONTRACTUAL 

ARRANGEMENT: 

Standard unit license with 
3 year maintenance 

INSTALLATION 

INCLUDES: 

Object modules 

Complete user 
documentation 

In-depth training courses 

FOR MORE 

INFORMATION: 

Contact a Computer Audit 
representative and arrange 
for a demonstration at 
your convenience. 


PRODUCT SOFTWARE: 


Offers choice between buying or building software, th 


Satisfies a well defined, typical processing ne 


ir e tha U 


Offers a new, unique technological approach to solving 
a particular problem or class of problems 

Offers an improvement on existing applications of 
systems programs. 


Additional 


product software 


available 


JCL/360 

Easytrieve/300 

Easytax/360 
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1320 Fenwick Lane / Silver Spring, Maryland 20910 
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Control statement generator 
and system flowcharter 




computer 

audit 

corporation 


1320 FENWICK LANE, 

SILVER SPRING, MARYLAND 20910 

























CONTROL STATEMENT 
GENERATOR 


■ Reduces Training time and costs. 

■ Reduces coding and keypunching 
time. 

■ Eliminates time spent in correct¬ 
ing errors. 

■ Reduces total turnaround per 
job by reducing reruns caused by 
JCL mistakes. 

■ Reduces programmer idle time. 

■ Provides standardization of pro¬ 
cedures. 

■ Provides documentation for run 
book. 

a Encourages programmers to pre¬ 
pare their JCL statements prior 
to their actual use. 

a Work sheet reminds programmer 
of required parameters. 

a Provides easy maintenance for 
the systems programmer. 

a Permits systems programmer to 
select and update the procedures 
and units to be included. 


JCL 


is a field-proven software system designed 
to achieve optimum communication be¬ 
tween programmer/analyst and the opera¬ 
ting system. It offers a unique method for 
accurate control statement generation and 
program run-book documentation. 

User Does This . . . 





























SYSTEM FLOWCHARTER 


/360 


Visually shows the flow of data 
sets and programs. 


will operate under PCP, MFT, HASP, and 
MVT operating systems. No conversion or 
modification is necessary when changing 
from one system to another. Provides capa¬ 
bility for easy maintenance. 


Provides documentation for run 
books. 

Performs extensive editing to in¬ 
sure that each data set is available 
when needed. 


omputer Does This . . , 
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SYSTEM 
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PREPARES 
LISTING OF 
GENERATED 
STATEMENTS 
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Errors in generated control state¬ 
ments are flagged on flowchart 
printout. 

Identifies procedure or program 
to be executed. 

Prints descriptive parameters next 
to each data set which is requested 
or generated. 

Indicates that input data is to be 
read from the job stream. 


PREPARES 

SYSTEM 

FLOWCHART 






















CONTRACTURAL ARRANGEMENTS 

Rights to use JCL/360 are leased to a single 
installation. Supplemental leasing contracts are 
available for multiple installations. The lease price 
includes: 

■ Complete user documentation 

■ Object program deck (or tape) 

■ Program installation, checkout, and operator 
indoctrination 

■ User orientation seminar 


About. . . COMPUTER AUDIT CORPORATION 

A Washington, D.C. based organization servicing the data processing community. The company specializes in 
PRODUCT SOFTWARE . . . with a high degree of professional competence. 

What it means to you . . . 

PRODUCT SOFTWARE offers you a choice between buying or building software that: 

■ Satisfies a well-defined, typical data processing need 

■ Offers a new unique technological approach to solving a particular proglem or class of problems 

■ Offers an improvement on existing applications or systems programs 


Maintenance warranty 

FURTHER INFORMATION 

For further information about JCL/360 contact: 


PRODUCT SOFTWARE means cost-saving by cost-sharing. Since software packages are usually priced 
significantly below actual development costs, you and other users share the development costs with the software 
manufacturer, realizing a profit through multiple sales. 


Additional. . . PRODUCT SOFTWARE... Available 


■ COMPAK/360 An On-Line Communication control program operating under the IBM Operating 
System which provides users (at graphic or hardcopy terminals) instantaneous access to a data base; 

■ EASYTAX/360— A comprehensive COBOL program which calculates withholding taxes for any tax 
jurisdiction in the United States or Canada, plus U.S. possessions and several foreign countries. 

■ EASYTRI EVE/300 - An information retrieval and reporting system designed for use by management 
to provide easy access to information for day-to-day planning and decision-making. 


COMPUTER AUDIT CORPORATION □ 1320 Fenwick Lane □ Silver Spring, Maryland 20910 
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(301) 587-0881 








PRODUCT IMPROVEMENT 


Based on our efforts to improve our software products, 
Computer Audit has incorporated the following additional 
capabilities into the JCL/360 Control Statement Generator. 

a) ability to include comment cards before or 
after any control statement that follows the 
JOB statement. 

b) ability to specify the following VOLUME parameters. 


1) VOLUME=SER= (ser#,....,ser#) Maximum of seven 

2) VOLUME=PRIVATE 

3) VOLUME=(PRIVATE,RETAIN) 

4) VOLUME=(,,seq#) 

5) VOLUME=(,,, volcount) 

6) VOLUME=REF=dsname 

7) VOLUME=REF=*. stepname.ddname 

8) Combinations of 1,2, and 3 can be included. 


The actual technique for incorporating the above 
parameters is explained in an addendum to the User s 
Manual. Essentially, the user may include these 
parameters on a continuation card following the 
card which contains the other data set parameters. 



COMPUTER AUDIT 


Dominick & Dominick 


LE ADDRESS 


DOMIK 


I A WALL STREET 
NEW YORK, N.Y. 10005 


P. O.BOX 125 
WALL STREET STATION - 


March 10, 1970 


Mr. Paul J. Caggiano 
Director of Marketing 
Computer Audit Corporation 
Silver Spring, Maryland 20910 

Dear Mr. Caggiano: 

My staff has been using your software package, JCL/360, 
for four months now and we are extremely pleased with 
the results. 

i 

Substantial savings have been effected through reduced costs 
of coding, keypunching, verification and reduced rerun time 
due to JCL errors. I feel that intangible benefits have been 
realized due to the fact that standards were required to 
successfully use the generator and that it improved the docu¬ 
mentation of our run-books. 

It is my feeling that when a company does a good job, they 
should be commended for it. 


Sincerely 



THOMAS MATARESE 
Systems Manager 



JCL/360 Input Work Sheet (Version II) 


Job name 
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8 

Operators 

1=GT 

5 = LE 

2=GE 

6 = NE 

3 = EQ 

7=EVEN 

4 = LT 

8 = ONLY 



Exec parameters 


Program 

or 

Procedure 


Labels 


DSNAME 

or 

SYSOUT=:n 

or 

DD * or DATA 

or 

DUMMY 
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Condition 

(MVT only) 
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Code 
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Oper 
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Region 
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COMPUTER AUDIT CORPORATION 

1150 Connecticut Avenue 
Washington, D. C. 20036 


imer or project name 


J—i—l—i—I—I—I—i—l_i_I_i_ 1 i i i i 

62 


MSGLEV 



‘M 

i — 

FB 

_ 

— 

FBA 

f = 

VB 

1 = 

FM 

!M 



DSORG 


1 = DA 

2 = DAU 

3 = IS 
4=ISU 


Density 


1=200 

2=556 

3 = 800 

4 = 1600 


Condition 



Code 

OP 


PRTY 


i 

i 
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64 

67 


68 69 

TRTCH 
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70 


71 


72 74 



ROLL 


X Y 



75 80 


Disposition 


1 = PASS 

2 = KEEP 

3 = DELETE 

4 = CATLG 

5 = UNCATLG 


lified name 

or 

member name 
or 

AM areas 
or 

IUT program 


Space allocation 

DCB parameters 

Disp. 


T or C 

Quantity 

incr. 

Directory 

Options 

LRECL 

BLKSIZE 

RECFM 

DSORG 

Density 

TRTCH 

Status 

Normal 

Abend 

VOLUME 

Paper 
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JCL/360 INPUT WORK SHEET 
INSTRUCTIONS 


JOB CARD parameters: 



Col 13-20: DDNAME 

Col 1-8 Job Name 

Enter the DDNAME assigned to the data set. 

Enter job name assigned to run. (Left justify.) 



COL 21: Unit Code 

Col 9-42: Account Number 

Enter the code number assigned for the desired unit. 

Enter account number. Left justify if less than 


34 characters. Special characters must be 

Col 22-27: Label Parameters 

enclosed by apostrophes. 

Enter label type code in Col 22, if desired. If EXPDT is desired. 


enter yyddd in Col 23-27. If RETPD is desired, enter nnnn in 

Col 43-62: Programmer or Project Name 

Col 23-26. (Right justify within these columns. Zero fill any 

Enter programmer's name or project name. (Left justify.) 

1eading columns . ) 

Col 63: Message Level 

Col 28: Type of file 

Enter a "1" if all of the control statements are to be 

If a non-temporary file is desired, enter a code "2". 

displayed during execution of the job. 



Col 29-36: DSNAME 

Col 64-67: Condition Code 

Enter the assigned DSNAME. (Left justify.) 

Enter desired condition code and actual operator. (Right 


justify.) 

Col 29-36: SYS0UT=n , 

NOTE: A condition code in the JOB card will over-ride all 

Enter SYS0UT=n, where n is the output writer. 

condition codes in EXEC statements. 



Col 29-32: DD * 

Col 68-69: Priority 

If input is reference to job stream, enter DD *. (One blank must 

Enter priority code, if applicable. (Right justify.) 

separate DD and *.) 

Col 70: Message Class 

Col 29-32: DATA 

Enter message class parameter, if applicable. 

If input from job stream will contain JCL statements, enter DATA. 

Col 71: Class 

Col 29-33: DUMMY 

Enter the desired class parameter, if applicable. 

If I/O operation for data set is to be suppressed, enter DUMMY. 

Col 72-74: Region Size 

Col 37-44: Qualified Name 

Enter the desired region size for entire job. 

Enter second parameter for qualified DSNAME. 

NOTE: A region size in the JOB card will over-ride al1 

NOTE: Directory and DSORG fields must be left blank. 

region parameters in EXEC statements. 



Col 37-44:- PDS Member Name 

Col 75-80: Roll 

Enter member name for the PDS. 

Enter "YES" in the X field if job step can be rolled out. 

NOTE: For new data sets, directory field must contain the number 

Enter "NO" in the X field if job steps cannot be rolled out. 

of directory blocks. For old data sets, where the member name 

Enter "YES" in the Y field if job step can cause roll out. 

must be enclosed by parentheses, code "9999" in the directory 

Enter "NO" in the Y field if job step cannot cause roll out. 

field, otherwise the member name will be treated as a qualified 

Leave blank if roll parameters are not desired. 

DSNAME . 

NOTE: The JOB card parameters must be the ftrst input card to the 

Col 37-44: ISAM Areas 

JCL/360 System. 

Enter PRIME, INDEX, or 0VFL0W as required. (Left justify.) 


Enter "9999" in the directory field. 


Col 37-44: Program Name 

,|OB( IS - Stat^n-iAi-vt-s-t - - 



tfirer—name—or—p rog ram -p©—d© assoc i a Ted —with The specT r red —output 


writer. (Left justify.) 

Must be included in input deck immediately following the JOB card 


parameters. Must be punched exactly as needed in final deck, including 

Col 45-57: Space allocation 

the "//" in columns 1 and 2. 

Enter a "T" in Col 45 if space is to be in tracks. 


Enter a "C" in Col 45 if space is to be in cylinders. 


Enter desired quantity in Col 46-49. (Right justify.) 

EXEC Statements: 

Enter incremental value, if desired, in Col 50-52. (Right justify.) 


Enter number of directory blocks, if desired, in Col 53-56. 

Col 1: Step 1D 

(Right justify. ) 

Enter an alphameric character (1-9 and A-Z). Each step must 

If RLSE and/or CONTIG are to be included, enter the desired code 

be unique. 

value in Col 57. 

Col 2-5: Condition Code 

Col 58-69: DCB Parameters 

Enter condition code value in columns 2-3, if required. (Right 

Enter LRECL, if. desired in Col 58-61. (Right justify.) 

justify.) Enter desired operator code, if applicable. Step 

Enter BLKSIZE, if desired, in Col 62-65. (Right justify.) 

ID refers to any previous step in the job. (Only one back- 

If °ECFM is to be included, enter desired code number in Col 66. 

ward reference is permitted.) 

If DSORG is to be included, enter desired code number in Col 67. 


If density is to be included, enter desired code number in Col 68. 

Col 6-8: Region Size 

If TRTCH is to be included, enter desired code number in Col 69. 

Enter region size for the job step. (Right justify.) 

NOTE: If TRTCH is specified, density must be specified. 

Col 9-11: Time in minutes 

Col 70-72: Disposition parameters 

Enter desired time in minutes for the job step. (Right justify.) 

If status is to be included, enter desired code number in Col 70. 


If disposition of data set at end of normal run is to be included. 

Col 12: Qua 1ifier 

enter code number in Col 71. 

If Region Size and Time are to be identified with a specific 

If disposition of data set at end of abnormal run is to be included. 

step name within a procedure, enter the code number for the 

enter code number in Col 72. 

step name. 

NOTE: One or more may be omitted. 

Col 13-20: Program Name or Procedure Name 

Col 73-78: Volume 

Enter desired program or procedure name. (If program was 

Enter Volume ID number. (All six columns must be filled in. 

stored as a temporary partitioned data set, enter member 

Enter leading zeros if necessary. Do not leave any blanks.) 

name under which it was stored.) 



Col 73-76: Paper form 

Col 21-65: Symbolic parameters and/or PARM parameters. 

Enter four digit code number for type of paper, if paper is to 

Enter desired symbolic and/or parm parameters free form be- 

be associated with an output writer. 

ginning in Col 21. Do not leave any intervening blanks. 


Continuation onto additional cards may be made by leaving 


one or more blanks, preceded by a comma or by placing a comma 

NOTE 1: Any parameter field may be left blank, if the parameter is not 

in column 65. All continuation cards must be coded in 

desired. The parameter will not be generated unless your in- 

columns 21 through 65 only. Any number of continuation cards 

stallation has preset default options for the parameter. 

is permitted. The last card must have one or more blank 


columns, not preceded by a comma or must end in column 65. 



NOTE 2: Concatenated files may be generated by leaving columns 1 through 


20 blank and completing the appropriate parameter fields. 

DD Statements: 


Col 1 -11 : Leave blank 

NOTE 3: Control cards for any procedure or utility program may be in- 


eluded as part of the JCL/360 input deck, provided that column 

Col 12: Qualifier 

one contains either a blank or a period. All other control 

Enter the code number for the step name to be used as the 

cards, source decks, etc., must be entered using Option 1 as 

qualifier on the DD statement. Leave blank if qualifier is 

outlined in the User's Manual. 

not desired. 













SYSTEM FLOW CHART FOR TEST RUN 1 
ACCOUNT NUMBER IS (990000-9336) 

PROJECT OR PROGRAMMER IS SAMPLE RUN 
MSGLEVFL=1 

CONDITION CODE IS 16 AND OPERATOR IS EO 

PRIORITY CODE IS 05 

MESSAGE CLASS IS A 

CLASS SPECIFIED IS C 

REGION IS SET AT 120K 

ROLL PARAMETERS ARF X=YES AND Y=NG 


X X 

X 

DDN AME= 

DS \i \M F = C ONC A TO 2 

LAB EL = SL 

L * r C1 = 30 

BL < S l Z F = 300 

.)i ~r c j- u f> 

• ,/ * * 
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VOLUME= 000090 

DDNAME 
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DSNAM E= CONCAT 03 
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DDNAME= SORTIN 
DSNAME= CONCATOi 
LAB EL = NL 

LREC L= 80 

X »# 

a r* 

. INPUT 
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. DATA 
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1 

V 

| EXFCUT 
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BLK SIZE= 400 

R EC FM= FB 

DISP= KEEP 

VOLUME- 012192 

\ 

4c 4c 
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1 
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1 

BLKSIZE=1600 

RFC FM= FB 

DISP= KEEP 

VOL UME= 009215 
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I 

I 


- > 

I 

I 

I 

S0RTWK02 V 

4c 4« 4« 4c 4c 
4c 4c 

4s 4c 

4c 4c 


4c 4c 4c 4 s 4c 


DDNAM E= SORTOUT 
D S N A M £ = S AMP 15 
LAB EL- SL 
LRECL = BO 
BLKSIZE=3?00 
R EC FM= F 8 
DIS P= ‘PASS 


DDNAME= S0RTWK03 





















DONAME= 
DONAME= 


CNTCARDS 
SYS IN 


INPUT . 

ST RF AN.-> 

DATA . | 

. I 

! 

! 

V STEP 2 

j-| R E G T f)N= 1Q0 

I EXECUTE | TIME- 45 
I ASMFCLG j<- 

j-j 

I 

I 

V 


V 


<- 





1 


1 


1 

I 


I 


I 

i 


1 


1 

V 

DDNAME= OUT PUT1 

V 

D D N A M E = MSGOUT 

V 

V ^ J. ^ X 

r * 4 * r v 

DSN = &&REC0RD1 


WRITER^ SYSOUT=A 


❖ * 

L AB EL = SL 

• • 

L R ECL= 133 

• 

t r 

LRECL= 120 

.OUTPUT. 

BLKSIZE= 133 

.OUTPUT 

4c * 

BLKSIZE= 600 

.WRITER. 

RECFM= FA 

.WRITER 

vrv4 v 

R EC F M= FB 


PAPERS 1411 


I 

S PACE= 200C 




1 

! 

i 

D I S P= PASS 




i 

I 

1 

DDNAM E = 

FT05FOO1 



I 

DDNAME- 

SYSIN 




| .INPUT . 

| .STREAM.-> 

J . DATA . j 

I I 

I I 

I I 

| V STFP 3 

j j-1 REGI0N-L40 

V IEXECUTE I 

-> J FORTGCLGI<- 

j-, 

I 

I 

V 


DDNAME= 
WRITER= 
LRECL= 
BLKSIZE 
RECF M= 


SYSUDUMP 
S Y SOUT = A 
133 
133 
FA 


4C# 

* * 

* $ 

$ * 


DDNAME= 

OSNAME= 

LABEL= 

LRECL= 

BLKSIZE 

REC FM= 

D I SP = 
VOLUME^ 


V 


<-> 


V 

DDNAME= FT03F001 

V 

DDNAME= SYSUDUMP 

V 

DDNAME= FT06F001 

$ 3{t* 

4c 4c 

D S NAME= MASTER 

L AB EL= SL 

• • 

WRITER- SYSOUT= A 
LRECL= 133 

• • 

WRIT ER= SYSOUT=C 
LRECL= 133 

4c * 

LRECL= 100 

.OUTPUT. 

BLK SIZ E= 133 

.OUTPUT. 

BLKSIZ E= 133 

4c 4c * 

<C $ 4c 4c 4c 

BLKSIZE=1004 

RECF M= VBS 

.WRITER. 

REC FM= FA 

.WRITER. 

RECFM-= FA 

SPAC E= 100T 


| DISP= PASS 

I 

I 

I 


FT02F001 

MASTER 

SL 

100 

1004 

VBS 

KEEP 

000961 




























//TESTRUN1 JOB (990000-9036), 

// * SAMPLE RUN ',MSGLEVEL= 1 , 

// CQND=(16,£0),PRTY=5,MSGCLASS=A,CLASS=C,REGI0N=120K, 
// ROL L = (YES, NO) 

//* 

//* SAMPLE TEST RUN OF JCL/360 

//* 

//JU3LIB DO DISP=(OLD,PASS) , 


// 

//STEP 

// 

//SORT 

//SORT 

//SORT 

//SORT 

//SORT 

//SORT 

//SORT 

// 

ft 

If 

ft 

If 

II 

ft 

ft 

tf 

ft 

II 

//SORT 

// 

// 


l)SNAME = PR I VATE .L I8RARY 
l EXEC SORT, 

REGION=L20K,T I M E = 9 0 
.SYSPRINT DO SYSOUT=A 


•SORTWKOL 
« SORTWK02 
• SORT WK03 
.SORT WK04 
•SORTWKO 5 
.SORT IN 


DO UN IT = 2 400 
DO UN l T = 2 400 
00 UN I T = 2400 
DO UN I T = 2400 
DO UN IT = 2 400 

OD UN IT = 240 0-2,LAB EL = (»NL), 

DISP-(OLD,KEEP,KEEP),DSNAME=CONCAT 01, 

VOL UME = S ER = 009215, 

OCB=(RECFM=FB»LRECL=80,BLKSIZE=1600,DEN=1,TRTCH=ET) 
DO UNIT=2400»LABEL=( ,SL ) , 

DISP-(OLD,KEEP,KEEP),DSNAM£=CONCAT02, 

VOLUM£=SER=000090, 

DCB=(REC FM-F B»LRECL=80,BLKSIZE=800) 

□ D UN IT = 2 40 0,LAB EL = ( ,SL), 

DISP=(OLD,KEEP,KEEP),OSNAME=CONCAT03, 

VOL UM E = S ER = 0 1219 2, 

DCB=(RECFM=FB,LRECL=80,BLKSIZE=400) 

.SURTOUT OD UNIT=2400,LABEL=(,SL), 

DISP=(NEW,PASS,KEEP),DSNAME=SAMP15, 
DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200) 


//SORT•SYSIN DD * 

SORT FI EL DS= {11,4,A,I,9,A),FORMAT=CH,SIZE=£30000 

/* 

//STEP2 EXEC ASMFCLG, 

// COND =(16,EQ,STEP 1),REG I ON.G0=100K, 

// TIME *G0= 45 

//ASM.SYS IN DD * 

CONTROL CARDS OR DATA CARDS NOT FOUND. 


/* 

//GO.INPUT DD UNIT=2400,LABEL=(,SL), 

// DISP=(OLD,KEEP,KEEP),DSNAME=SAMP 15, 

// DCB=(RECFM=FB,LRECL=80,BLKSIZE=3200) 

//GO.OUTPUT 1 DD UNIT=2314,LABEL-(,SL), 

// OISP=(NEW,PASS,PASS),DSNAME=CCRECQRD1, 

// SPACE=(CYL,(200,20)) , 

// DCB=(RECFM=FB,LRECL=120,BLKSIZE=600) 

//GO•MSGOUT OD SYSOUT={A,,1411), 

// DCB=(RECFM=FA,LRECL=133,BLKSIZE=133) 


AATESTRU 

ABTESTRU 

ACTESTRU 

ADTESTRU 


AETESTRU 

AFTESTRU 

AGTESTRU 

AHTESTRU 

AITESTRU 

AJTESTRU 

AKTESTRU 

ALTESTRU 

AMTESTRU 

ANTESTRU 

AOTESTRU 

APTESTRU 

AQTESTRU 

ARTESTRU 

ASTESTRU 

ATTESTRU 

AUTESTRU 

AVTESTRU 

AWTESTRU 

AXTESTRU 

AYTESTRU 

AZTESTRU 

BATESTRU 

BBTESTRU 

BCTESTRU 

BDTESTRU 

BETESTRU 

BFTESTRU 

BGTESTRU 

BHTESTRU 

BITESTRU 

BJTESTRU 

BKTESTRU 

BLTESTRU 

BMTESTRU 

BNTESTRU 

BOTESTRU 

BPTESTRU 

BQTESTRU 

BRTESTRU 

BSTESTRU 

BTTESTRU 






****************************** input data follows ****************************** 


TESTRUN 1 (9900 00-9 03 6) 

$ 

SAMPLE RUN 

116EQ05AC120YESN 

* SAMPLE TEST RUN OF 

* 

JCL/360 



JOBLIB 

2PRIVATE LIBRARY 


11 

I 120 90 SORT 




1SYSPRINT1 

S YSOUT=A 



1 SORT WKO 11 




ISDRTWK021 




1 SORTWK031 




1S0RTWK041 




1 SORT WKO 51 




1 SORT IN 22 

2C0NCAT 01 

8016005 

26122009215 

1 1 

2C0NCAT02 

80 8005 

122000090 

11 

2CGNCAT 03 

80 4005 

122012192 

1 SOR TOUT 11 

2 SAMP 15 

8032005 

212 

1 SYS IN 

DD * 



SORT F I ELOS= ( ll,4 f A,l f 

9,A),FORMAT=CH,SIZE=E30000 



21631100 453ASMFCLG 




1SYSIN 

DD * 



3INPUT 11 

2SAMP15 

8032005 

122 

30UTPUT1 61 

REC0RD1 C 200 20 

120 6005 

211 

3MSGQUT 

SYSOUT^A 

133 1334 

1411 

3SYSUDUMP 

SYS OUT=A 

133 1334 


3CNT CARDS 

DD * 



31631140 3FGRTGCLG 




1SYSIN 

DD * 



3FT01F00161 

REC0RD1 

120 6005 

133 

3FT02F00111 

2MASTER 

10010047 

122000961 

3FT03F00111 

2MASTER 

10010047 

212 

3SYSUDUMP 

SYSOUT=A 

133 1334 


3FT06F001 

SYS0UT=C T 100 6 

133 1334 


3FTO5F00 1 

DD * 



41631 64 303COBFCL G 




1SYSIN 

DD * 



3INPUT 11 

2MASTER 

10010047 

122 

30UTPUT 

S YS0UT=F T 200 12 

13313306 

1412 

3DAT ECRO 

DD * 



*$**$*$$$***:jf4c$*$3*;£ # £ £ 

* * * * * * * INPUT DATA COMPLETED **************************: 














//TESTRUNl JOB (990000-9036), 

// •SAMPLE RUN 1 ,MSGLEVEL =1, 

it COND-(16 , E 0 ),PRTY=5,MSGCLASS=A,CLASS=C,REGI0N=120K, 

// ROL L = (YES,NO) 

//* 

//* SAMPLE TEST RUN OF JCL/360 

it* 

//JUBLIB DO DISP=(OLD,PASS) , 

// DSNAME-PRIVATE.LI3RARY 

//ST E P l EXEC SORT, 
if REGION=120K,T I M E = 9 0 

//SCiRT.SYSPRINT DD SYSQUT-A 
//S0RT.S0RTWK01 DD UNIT-2400 
//S0RT.SGRTWK02 DD UNIT-2400 


it SORT 

//SORT 

//SORT 

it SORT 

it 

it 

it 

it 

it 

it 

it 

it 

it 

it 

// 

//SORT 

it 

// 

//SORT 

SORT 


• SORT N K 0 3 DD 
.SORT WK04 DD 
•S0RTWK05 DO 

• SORT IN DD 


UNIT-2400 
UNIT-2400 
UNIT = 2 40 0 

UN IT-2400-2,LABEL-(,NL) 


DISP-(OLD,KEEP,KEEP),DSNAME-CONCAT 01, 

VOLUME-SER-009215, 

DCB-(RECFM-FB,LR EC L = 80 , B LK SIZE-l600,DEN-1,TRTCH=ET) 
DD UNIT-2400,LABEL=( ,SL ) , 

DISP-(OLD,KEEP,KEEP),DSNAME-CONCAT02, 

VOLUME-SER-000090, 

DCB-(RECFM-FB,LRECL-80,BLKSIZE-800) 

DD UNIT-2400,LABEL-C,SL), 

DISP-(OLD,KEEP,KEEP),DSNAME-CONCAT 03, 
V0LUME-SER-012192, 

DCB-(RECFM-FB,LRECL-80,BLKSIZE-400) 

.SURTOUT DD UN IT-2400,LABEL-(,SL), 

DISP-(NEW,PASS,KEEP),DSNAME-SAMP15, 

DCB-(RECFM-FB,LRECL-80,BLKSIZE-3200) 

•SYSIN DD * 

FIELDS-(11,4,A,1,9,A),FORMAT-CH,SIZE-E30000 


/* 

//STEP2 EXEC ASMFCLG, 

// COND-(16,EQ,STEP 1),REG I ON.GO-100K, 

it TIME.GO-45 

//ASM.SYSIN DD * 

CONTROL CARDS OR DATA CARDS NOT FOUND. 


/* 

//GO.INPUT DD UNIT-2400,LABEL=(,SL), 

// DISP=(OLD,KEEP,KEEP),DSNAME=SAMP 15, 

// DCB-(RECFM-FB,LRECL-80,BLKSIZE-3200) 

//GO.OUTPUT 1 DD UN IT-2314,LABEL-(,SL), 
if OISP-(NEW,PASS,PASS),DSNAME-CCREC0RD1, 

ft SPACE=(CYL,(200,20)) , 

// DCB-(RECFM-FB,LRECL-120,BLKSIZE-600) 

/ /GO•MSGOUT DO SYSOUT- 1 A,,1411), 

// DCB-(RECFM-FA,LRECL-133,BLKSIZE=133) 


AATESTRU 

ABTESTRU 

ACTESTRU 

ADTESTRU 


AETESTRU 

AFTESTRU 

AGTESTRU 

AHTESTRU 

A ITESTRU 

AJTESTRU 

AK TESTRU 

ALTESTRU 

AMTESTRU 

ANTESTRU 

AOTESTRU 

APTESTRU 

AQTESTRU 

ART ESTRU 

ASTESTRU 

ATTESTRU 

AUT ESTRU 

AVTESTRU 

AWTESTRU 

AXT ESTRU 

AYTESTRU 

AZT ESTRU 

8ATESTRU 

BBTESTRU 

BCTESTRU 

BDTESTRU 

BETESTRU 

BFT ESTRU 

BGTESTRU 

BHTESTRU 

BITESTRU 

BJ TESTRU 

BKTESTRU 

BLTESTRU 

BMTESTRU 

BNTESTRU 

BOTESTRU 

BPTESTRU 

BQTESTRU 

BRTESTRU 

8STESTRU 

BTTESTRU 








r- COMPUTER AUDIT CORPORATION 


Software Product 


EASYTRIEVE 

Ml 

PROFILE 


INTRODUCTION 

EASYTRI EVE/300 is an information retrieval and reporting 
program for the IBM System 360 and RCA Spectra 70. It's 
usefulness transcends virtually every facet of a business or 
industrial organization . . . from the computer room where it 
can perform a number of utility functions, to the manager at 
any level who can use the program to query data files and 
obtain selective reports for day-to-day business decisions. 


APPLICATION AREAS 

SELECTIVE INFORMATION RETRIEVAL AND REPORT¬ 
ING. Designed for use by anyone having little or no knowledge 
of computers or data processing techniques, EASYTRIEVE/ 
300 bridges the gap between data files in the computer room 
and managers, supervisors and others requiring access to the 
information for day-to-day planning and decision-making. 

Using simple, English-like queries, data can be extracted from 
a file, totaled, summarized, or subjected to user-defined 
computation, then printed out in standard or special report 
formats. When EASYTR I EVE's computational and report¬ 
writing capabilities are used together, the result is a complete 
tool for automating many day-to-day paperwork tasks. 


If your business data is on magnetic tape or punched cards, the 
value of EASYTRIEVE as a tool for producing reports... on 
a scheduled basis or to satisfy a one-time on-the-spot need . . . 
is virtually unlimited. 


ACCOUNTING AND STATISTICAL REPORTING. When 
operating in this mode, EASYTRIEVE totals all or selected 
data records . . . such as accounts payable, sales volume, 
salaries, inventory level, etc. . . . and prints out the totals at 
specified minor, intermediate, and major control levels. All the 
user is required to do is: 

■ Specify whether all or selected records in the data 
file are to be involved. 

■ Identify up to four levels of control for subtotal¬ 
ling. 

■ Identify the data fields to be totalled and printed. 

The contents of the control fields are printed automatically, 
followed by the totals and subtotals for each specified total 
field at each break (change in value) of a control field. After 
the entire file has been passed, EASYTRIEVE automatically 
prints the grand totals. 


FEATURES 

■ Searches and retrieves selected 
data from any fixed-length, 
blocked or unblocked data re¬ 
cords on magnetic tape or disk. 

■ Searches and retrieves selected 
data from punched-card records 

■ Free-form, easy-to-use English 
query language requiring little or 
no understanding of computers 
or data processing technology 

□ Arithmetic and logical capabili¬ 
ties, with up to 100 "AND" or 


"OR" data selection conditions 
per file pass 

■ Processes up to 50 separate 
queries in a single pass of the 
source file 

■ Information summary and total¬ 
ing capabilities 

■ Automatic or user-controlled re¬ 
port formating 

■ Automatic sorting of output files 
and reports 


APPLICA T/ONS MODES 

■ Selective Information Retrieval 
and Reporting 

■ Accounting and Statistical Re¬ 
porting 

■ Selective Mailing Label Genera¬ 
tion 

■ Data File Editing 

■ Card-to-Tape Conversion and 
Data Verification, Tape Duplica¬ 
tion, Data File Listing 
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MAILING LABEL GENERATION. The ability to generate 
mailing labels is a distinct and outstanding feature of EASY- 
TRIEVE. Whatever the mailing job . . . corporate notices, fund 
raising, direct mail promotions, solicitations, internal commun¬ 
ications . . . EASYTRIEVE completely automates mailing 
label preparation. Furthermore, no special data file is required 
. . . existing personnel, vendor, or sales files can be easily used 
if they contain the necessary mailing information, regardless of 
other information contained in the file. This is because 
EASYTRI EVE allows the user to: 

■ Select those records or categories of records to be 
used for the mailing (based on employee number 
or other identification). 

■ Select the data fields to be printed on the label 
(name, title, street, city, etc.). 

■ Specify the fields to appear on each line. 

■ Control label width and number of labels printed 
across. 

EASYTRIEVE can produce 4-across labels, each containing up 
to six lines of information, on standard or special label forms 
(e.g., Cheshire forms, pressure-sensitive labels, etc.). 

DATA FILE EDITING. For deleting records, or changing the 
value of fields within all or selected records in a file, 
EASYTRIEVE is a fast and extremely powerful tool. The 
easy-to-use EASYTRIEVE control language allows the person¬ 
nel administrator, payroll supervisor, sales manager. . . anyone 
with first-hand knowledge of the changes to be made ... to 
update his data files directly. Desired changes can be recorded 
once ... in EASYTRIEVE language . . . thus eliminating 
unnecessary and time-consuming intermediate steps. 


UTILITY OPERATIONS. In the computer room, EASY¬ 
TRIEVE can help perform a number of normal "housekeep¬ 
ing" functions, including: 

■ Card-to-tape Conversion and Data Verification 

■ Tape Duplication 

■ Data File Listing 

■ Creation of sub-files (selected records from a 
master file). 

APPROACH TO USAGE 

Use of EASYTRIEVE involves two basic steps: 

■ Preparation of a field name index defining the 
format of the file to be searched, and 

■ Preparation of EASYTRIEVE statements (queries) 
defining data search, retrieval, computation, and 
format requirements. 

FIELD NAME INDEX. The field name index is simply a 
description of the layout of the data file to be searched. It 
contains: 

■ The file name and the record size. 

■ The name (assigned by the EASYTRIEVE user), 
position, character count, and type (alphabetic, 
numeric, or packed) of each field in the record. 

It is not necessary to prepare a new field name index each time 
a file is processed. Instead, indices for all active production 
files can be prepared and placed in a library, then extracted 
and used each time the file is to be queried. 


PARTIAL LIST OF EASYTRIEVE STATEMENTS 


T(title) 


Contains report title or header to be printed at UPDATE 
the top of each report page. 


Causes EASYTRIEVE to perform file repair 
runs. 


IF, AND, 

Define the relationship between data search and 

LABELS 

and OR 

retrieval conditions for a particular query. 

COMPUTE 

Defines arithmetic operations to be performed 
on specified fields of selected records. 

LIST 

CONTROLS 

Specifies up to four control fields, minor to 
major, for accounting or statistical reports. 

EVERY 

BREAK 

Prints subtotal of number of records printed 
and allows page ejection at breaks in the value 
of specified fields. 

LIMIT 

EDIT 

Initializes EASYTRIEVE for data file editing 



runs. 

SORT 


Enables production of 1, 2, 3 or 4 across 
mailing labels. 

Identifies fields to be reported during a report 
run and sets special report formatting para¬ 
meters. 

Indicates every Nth record is to be selected for 
output. 

EASYTRIEVE goes to end of job when stated 
limit of output records has been reached. 

Specifies the order of an output file or report. 
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FIELD NAME INDEX—EXAMPLE 


EASYTRIEVE QUERIES. An EASYTRIEVE query consists 
of one or more English-like statements that define the 
operations to be performed during a single pass of the data 
file. The statements are arranged in a natural sequence 
indicating the desired logical progression of events. Normally, 
for example, one first specifies the record selection criteria (IF 
statement), then special operations on selected data fields 
(COMPUTE, CONTROLS, etc.), and finally report format and 
content requirements (LIST and TITLE statements). 


PROCESSING FLOW. 

EASYTRIEVE pre-processes the query deck, then extracts all 
records for all queries in a single pass of the input tape. Data 
for the first query are formatted and output to the printer; 
records for all other queries are output to magnetic tape or 
disk, then printed in turn automatically. In the reporting and 
label modes, the user has the option to segregate records for all 
or specified queries on separate output files. In the edit and 
utility modes, the output file is identical to the input file, 
except for editing changes specified in the query. 


FUNCTIONAL CHARACTERISTICS 

EASYTRI EVE/300 is written in basic assembly language for 
the IBM/360 and RCA Spectra 70. The program will operate 
on fixed or variable length, blocked or unblocked files 
containing numeric, alphabetic, or packed data. It will also 
process data files in punched card form, one record per card. 


SYSTEM REQUIREMENTS 

IBM SYSTEMS 360. Model 30 and up, minimum 
of 32K Core, DOS, TOS, OS. 

SPECTRA 70. Model 35 and up, minimum of 65K 
core, TOS, TDOS, DOS. 

MINIMUM PERIPHERAL DEVICE REQUIRE¬ 
MENTS. 1 tape drive, card reader-punch, printer. 


PERSONNEL 133 

EMP/NO 1 6 N, NAME 7 25 A, Bl RTH 32 6 N 
SEX 38 1 A, M/S 39 1 A, DEGREE 40 3 A 
TITLE 43 20 A, REGN 63 1 N, DIVN 64 1 N 
HIRED 65 6 N, SALARY 71 30 A 
CITY 107 26 A, STREET 77 30 A 
MTHLY/PAY X 7 N2 f WEEK LY/PAY X N2, 9999 


QUERY EXAMPLES 


SELECTIVE RETRIEVAL AND REPORTING 

IF SEX EQ M AND SALARY GR 20000 
T MALE EMPLOYEES EARNING OVER $20K 
LIST EMP/NO, NAME, TITLE, REGN, DIVN 
IF REGN EQ3, 9 AND HIRED GR 560000 
T REGN 3 & 9 EMPLOYEES HIRED SINCE 1956 
LIST EMP/NO, REGN, TITLE, HIRED 
IF REGN EQ 1 AND DIVN GR 2 
MTHLY/PAY = SALARY / 12 
WEEKLY/PAY = SALARY / 52 
CONTROLS DIVN, REGN-EJECT 

T SALARY RATES FOR REGION 1, DIVISIONS 3, 4 and 5 
LIST DETAIL NAME, SALARY, MTHLY/PAY, WEEKLY/PAY 

ACCOUNTING AND STATISTICAL REPORTING 

IF REGN EQ 6 
CONTROLS DIVN, REGN 

T GROSS PAYROLL BY REGION AND DIVISION 
LIST REGN, DIVN, SALARY 

MAILING LABEL GENERATION 

IF REGN EQ 5-7 AND DIVN NQ 2 

LABELS LINE1 NAME LINE2 STREET 
LINE3 CITY, STATE, ZIP 

DATA FILE EDIT 

EDIT 

IF EMP/NO EQ 037 
SALARY = 17500 
IF EMP/NO EQ 126 
TITLE = VICE-PRESIDENT 
SALARY = 25000 
REGN = 4 
DIVN = 3 
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CONTRACTURAL ARRANGEMENTS 


FURTHER INFORMATION 


Rights to use EASYTRI EVE/300 are leased to a For further information about EASYTRI EVE/300 

single installation. The duration of the lease is contact, 

unlimited. Supplemental leasing contracts are avail¬ 
able for multiple installations. The lease price in¬ 
cludes: 

■ Complete user documentation 

m Object program deck (or tape) 

■ Program installation, checkout, and opera¬ 
tor indoctrination 

■ User orientation seminar 

■ Maintenance warranty 
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About.. . COMPUTER AUDIT CORPORATION 
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A Washington, D.C, based organization servicing the data processing community. The company specializes in 
PRODUCT SOFTWARE . . . with a high degree of professional competence. 




What it means to you . . . 
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PRODUCT SOFTWARE offers you a choice between buying or building software that: 

■ Satisfies a well-defined, typical data processing need 

■ Offers a new unique technological approach to solving a particular problem or class of problems. 

. .• .. • . . . 




Bill 


Offers an improvement on existing applications or systems programs 




PRODUCT SOFTWARE means cost-saving by cost-sharing. Since software packages are usually priced 
significantly below actual development costs, you and other users share the development costs with the software 
manufacturer, realizing a profit through multiple sales. 
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Additional.. . PRODUCT SOFTWARE. . . Available 
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■ COMPAK/360 - A time sharing control program operating under the IBM Operating System which 

provides users (at graphic or hardcopy terminals) instantaneous access to a data base; 

■ ■ ■ ■ :■•■"■■■■■■■■ -■ ■ ’ ’ ■ . ' ' • 

■ JCL/360 - A control statement generator and system flowcharter designed to achieve optimum 
communication between programmer/analyst and the IBM 360 Operating System. JCL/360 will 

_^ + nr DPD l\/IPT OnH M\/T 






operate under PCP, MFT and MVT. 
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EASYTAX/360 _ 

jurisdiction in the United States or Canada, plus U.S. possessions and several foreign countries. 

■ 

... - . . ■ .... . . 
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PRICING AND MAINTENANCE 


COMPAK/360 ON-LINE COMMUNICATIONS CONTROL SYSTEM 

A. STANDARD UNIT LICENSE $40,000 

INSTALLATION CHARGE (ONE TIME) $10,000 

Installation & Systems consulting - 3 man 
months (60 days). 

1 year - update and maintenance free. 
Maintenance contract available after 1 
year at $250/per month. 

Updates available as they are released. 

B. STANDARD UNIT EXTENDED PAYMENT LICENSE 

1 year plan - $ 3660/Monthly 

3 year plan - $1660/Monthly 

5 year plan - $1100/Monthly 

Installation charge (one time) with all 
plans - $10,000. 

Maintenance mandatory on 3 & 5 year plans 
at $250/per month. 

Optional additional training - $200 per 
day + travel. 

Optional systems support as required: 

Senior Systems Analyst - $250 per day 
Systems Analyst - $200 per day 


EASYTAX/360 WITHHOLDING TAX CALCULATOR PACKAGE 

A. STANDARD UNIT LICENSE $2500 

INSTALLATION CHARGE (ONE TIME)$ 300 

B. STANDARD UNIT LEASE - Not available 
1 year maintenance free 

Maintenance contract available after 1 
year at $75/per month. 

Updates supplied on time & material + 
travel basis. 


EASYTRIEVE/300 INFORMATION RETRIEVAL AND REPORTING 

SYSTEM 


A. 

STANDARD 

UNIT 

LICENSE 

$4300 

B. 

STANDARD 

UNIT 

LEASE 

$ 240/Mo 


(Minimum 12 mos) 

INSTALLATION CHARGE (ONE TIME) $300 

1 year - update and maintenance free. 
Maintenance contract available after 1 
year at $100/per month. 

Updates available as they are released. 


JCL/360 CONTROL STATEMENT GENERATOR PACKAGE 


A. 

STANDARD 

UNIT 

LICENSE 

$4950 

B. 

STANDARD 

UNIT 

LEASE 

$ 240/Mo 


(Minimum 12 mos) 

INSTALLATION CHARGE (ONE TIME) $300 

1 year - update and maintenance free. 
Maintenance contract available after 1 
year at $100/per month. 

Updates available as they are released. 


d 

COMPUTER AUDIT 
















CUSTOMER REFERENCES 


EASYTRIEVE/300 JUSTICE DEPARTMENT 

Mr. Josh Callan 

Manager, Systems & Programming 
615 Pennsylvania Ave, N.W. 
Washington, D.C. 

(202) 737-8200 X 3902 


JCL/360 DOMINICK & DOMINICK 

Mr. Tom Matarese 
14 Wall Street 
New York, N.Y. 

(212) 227-4600 X 612 

Mr. John Jandras X 614 


EASYTAX/360 ACACIA LIFE INSURANCE CO. 

Mr. Richard Drechsler 
51 Louisiana Ave., N.W. 
Washington, D.C. 

(202) NA 8 -4600 X419 


COMPAK/360 


DOMINICK & DOMINICK 
Mr. Tom Matarese 
14 Wall Street 
New York, N.Y. 

(212) 227-4600 X 612 

Mr. John Jandras X 614 

BURLINGTON INDUSTRIES 
Mr. Don Ernst 
1290 6th Avenue 
New York, N.Y. 10019 
(212) 333-7927 



COMPUTER AUDIT 











